1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
{-
Elm(엘름): 99 bottles of beer 예제
출처: http://www.rosettacode.org/
-}
module Main exposing (main)
import Html
main =
List.range 1 100
|> List.reverse
|> List.map
(\n ->
let
nString =
String.fromInt n
n1String =
String.fromInt (n - 1)
in
[ nString ++ " bottles of beer on the wall"
Enter to Rename, <Shift>+Enter to Preview